home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 15 / BBS in a box XV-1.iso / Files / Font / Font Tools / FontPrint 1.0.2.sit / FontPrint 1.0.2.rsrc / TEXT_130_GetFontList.txt < prev    next >
Encoding:
Text File  |  1994-09-28  |  806 b   |  5 lines
  1. /I/flush load def/$/def load def/&/dup load def/,/FontDirectory load def/E/search load def/H/gt load def/M/getinterval load def/K/forall load def/*/exch load def/D/eq load def/#/string load def/J/if load def/A/cvs load def/N/cvlit load def/B/systemdict load def/C/known load def/'/length load def/!/statusdict load def/F/add load def/G/ifelse load def/+/print load def/"/put load def/?/pop load def/L/sub load def/@/=string load def
  2. !/jobname(FontPrint - getting font list)"/s1 1 # $/x 0 $/pp{& ' s1 * 0 * " s1 + +}$ ,{? @ A B/cshow C{&(NotDefFont)D{?}{(.)E{? ? ?}{& ' x F/x
  3. * $ pp}G}G}{& ' x F/x * $ pp}G x 180 H{I/x 0 $}J}K B/filenameforall C{(fonts/*){& ' 6 L 6 * M & N , * C{?}{B/cshow C{
  4. &(NotDefFont)D{?}{(.)E{? ? ?}{& ' x F/x * $ pp}G}G}{& ' x F/x * $ pp}G}G x 180 H{I/x 0 $}J}90 # filenameforall}J
  5.